Public MustInherit Class SumarioBase
    Dim _rnkPalavras As RankingPalavras
    Dim _rnkOracoes As RankingOracoes

    Public Sub New()
    End Sub

    Public Sub New(ByVal txtResumo As String)
        _Resumo = txtResumo
    End Sub


    Private _Resumo As String
    Public Property Resumo() As String
        Get
            Return _Resumo
        End Get
        Set(ByVal value As String)
            _Resumo = value
        End Set
    End Property

    Public Property rnkPalavras() As RankingPalavras
        Get
            Return _rnkPalavras
        End Get
        Set(ByVal value As RankingPalavras)
            _rnkPalavras = value
        End Set
    End Property

    Public Property rnkOracoes() As RankingOracoes
        Get
            Return _rnkOracoes
        End Get
        Set(ByVal value As RankingOracoes)
            _rnkOracoes = value
        End Set
    End Property

End Class
